Module Chunhat       Sub Main()       Console.Write("_ Nhập vào chiều dài hình chữ nhật: ")       Dim a As Decimal = Console.ReadLine() 'Decimal nghĩa là số thập phân       Console.Write("_ Nhập vào chiều rộng hình chữ nhật: ")       Dim b As Decimal = Console.ReadLine()               Dim KetQua1 As Decimal = (a+b)*2 'Có thể đặt tên biến là CV       WriteLine("_ Chu vi hình chữ nhật là: {0}",KetQua1)       Dim KetQua2 As Decimal = a*b 'Có thể đặt tên biến là DT              WriteLine("_ Diện tích hình chữ nhật là: {0}",KetQua2)'{0} ở đây là chỗ chứa dữ liệu của biến khi xuất dữ liệu nếu không có nó dữ liệu sẽ không được xuất       End Sub      End Module